inherited fmProjeBazliSiparis: TfmProjeBazliSiparis
  Left = 246
  Top = 116
  Caption = 'Proje Bazl'#305' Sipari'#351' '#304'zleme'
  ClientHeight = 570
  ClientWidth = 974
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl [0]
    Tag = 537
    Left = 0
    Top = 0
    Width = 974
    Height = 570
    ActivePage = TS5
    Align = alClient
    TabOrder = 0
    object TS5: TTabSheet
      Caption = 'Sipari'#351' Rapor'
      ImageIndex = 4
      object GroupBox8: TGroupBox
        Left = 0
        Top = 0
        Width = 966
        Height = 62
        Align = alTop
        TabOrder = 0
        object Label6: TLabel
          Left = 158
          Top = 39
          Width = 39
          Height = 13
          Caption = 'Bit.Tarih'
        end
        object Label10: TLabel
          Left = 159
          Top = 14
          Width = 45
          Height = 13
          Caption = 'Ba'#351'.Tarih'
        end
        object Label11: TLabel
          Left = 11
          Top = 10
          Width = 42
          Height = 13
          Caption = 'Carikodu'
        end
        object btSiparisRapor: TBitBtn
          Left = 348
          Top = 10
          Width = 102
          Height = 46
          Caption = 'Listele'
          TabOrder = 3
          OnClick = btSiparisRaporClick
        end
        object BitTarih: TwwDBDateTimePicker
          Left = 214
          Top = 35
          Width = 127
          Height = 21
          CalendarAttributes.Font.Charset = DEFAULT_CHARSET
          CalendarAttributes.Font.Color = clWindowText
          CalendarAttributes.Font.Height = -11
          CalendarAttributes.Font.Name = 'MS Sans Serif'
          CalendarAttributes.Font.Style = []
          Epoch = 1950
          ShowButton = True
          TabOrder = 2
          UnboundDataType = wwDTEdtDate
          OnChange = dtTarihChange
        end
        object BasTarih: TwwDBDateTimePicker
          Left = 214
          Top = 13
          Width = 127
          Height = 21
          CalendarAttributes.Font.Charset = DEFAULT_CHARSET
          CalendarAttributes.Font.Color = clWindowText
          CalendarAttributes.Font.Height = -11
          CalendarAttributes.Font.Name = 'MS Sans Serif'
          CalendarAttributes.Font.Style = []
          Epoch = 1950
          ShowButton = True
          TabOrder = 1
          UnboundDataType = wwDTEdtDate
          OnChange = dtTarihChange
        end
        object edCarikodu: TwwDBEdit
          Left = 9
          Top = 23
          Width = 134
          Height = 21
          TabOrder = 0
          UnboundDataType = wwDefault
          WantReturns = False
          WordWrap = False
        end
      end
      object GroupBox9: TGroupBox
        Left = 0
        Top = 514
        Width = 966
        Height = 28
        Align = alBottom
        TabOrder = 2
        object Label8: TLabel
          Left = 9
          Top = 9
          Width = 59
          Height = 13
          Caption = 'Kay'#305't Say'#305's'#305' :'
        end
        object Label9: TLabel
          Left = 74
          Top = 9
          Width = 6
          Height = 13
          Caption = '0'
        end
      end
      object PageControl2: TPageControl
        Left = 0
        Top = 62
        Width = 966
        Height = 452
        ActivePage = TabSheet1
        Align = alClient
        TabOrder = 1
        object TabSheet1: TTabSheet
          Caption = 'Tablo'
          object cxGrid3: TcxGrid
            Left = 0
            Top = 0
            Width = 958
            Height = 424
            Align = alClient
            TabOrder = 0
            object cxGrid3DBTableView1: TcxGridDBTableView
              NavigatorButtons.ConfirmDelete = False
              NavigatorButtons.First.Visible = True
              NavigatorButtons.PriorPage.Visible = True
              NavigatorButtons.Prior.Visible = True
              NavigatorButtons.Next.Visible = True
              NavigatorButtons.NextPage.Visible = True
              NavigatorButtons.Last.Visible = True
              NavigatorButtons.Insert.Visible = True
              NavigatorButtons.Append.Visible = False
              NavigatorButtons.Delete.Visible = True
              NavigatorButtons.Edit.Visible = True
              NavigatorButtons.Post.Visible = True
              NavigatorButtons.Cancel.Visible = True
              NavigatorButtons.Refresh.Visible = True
              NavigatorButtons.SaveBookmark.Visible = True
              NavigatorButtons.GotoBookmark.Visible = True
              NavigatorButtons.Filter.Visible = True
              DataController.DataSource = dsSiparisListe
              DataController.Summary.DefaultGroupSummaryItems = <>
              DataController.Summary.FooterSummaryItems = <>
              DataController.Summary.SummaryGroups = <>
              OptionsBehavior.IncSearch = True
              OptionsData.CancelOnExit = False
              OptionsData.Deleting = False
              OptionsData.DeletingConfirmation = False
              OptionsData.Editing = False
              OptionsData.Inserting = False
              OptionsSelection.UnselectFocusedRecordOnExit = False
              OptionsView.NoDataToDisplayInfoText = '  '
              OptionsView.Indicator = True
              object cxGrid3DBTableView1SiparisNo: TcxGridDBColumn
                DataBinding.FieldName = 'SiparisNo'
              end
              object cxGrid3DBTableView1Tarih: TcxGridDBColumn
                DataBinding.FieldName = 'Tarih'
                Width = 68
              end
              object cxGrid3DBTableView1BelgeNo: TcxGridDBColumn
                DataBinding.FieldName = 'BelgeNo'
                Width = 76
              end
              object cxGrid3DBTableView1Carikodu: TcxGridDBColumn
                DataBinding.FieldName = 'Carikodu'
                Width = 110
              end
              object cxGrid3DBTableView1FirmaAdi: TcxGridDBColumn
                DataBinding.FieldName = 'FirmaAdi'
                Width = 154
              end
              object cxGrid3DBTableView1Faturano: TcxGridDBColumn
                DataBinding.FieldName = 'Faturano'
                Width = 58
              end
              object cxGrid3DBTableView1FaturaBilisNo: TcxGridDBColumn
                DataBinding.FieldName = 'FaturaBilisNo'
                Width = 73
              end
              object cxGrid3DBTableView1Stokkodu: TcxGridDBColumn
                DataBinding.FieldName = 'Stokkodu'
                Width = 104
              end
              object cxGrid3DBTableView1Cinsi: TcxGridDBColumn
                DataBinding.FieldName = 'Cinsi'
                Width = 160
              end
              object cxGrid3DBTableView1SiparisMiktar: TcxGridDBColumn
                DataBinding.FieldName = 'SiparisMiktar'
                Width = 76
              end
              object cxGrid3DBTableView1FaturaMiktar: TcxGridDBColumn
                DataBinding.FieldName = 'FaturaMiktar'
                Width = 81
              end
            end
            object cxGrid3Level1: TcxGridLevel
              GridView = cxGrid3DBTableView1
            end
          end
        end
        object TabSheet2: TTabSheet
          Caption = 'Pivot'
          ImageIndex = 1
          object cxDBPivotGrid2: TcxDBPivotGrid
            Left = 0
            Top = 0
            Width = 958
            Height = 424
            Align = alClient
            DataSource = dsSiparisListe
            Groups = <>
            TabOrder = 0
            object cxDBPivotGrid2SiparisNo: TcxDBPivotGridField
              AreaIndex = 0
              IsCaptionAssigned = True
              Caption = 'Sipari'#351' No'
              DataBinding.FieldName = 'SiparisNo'
              Visible = True
            end
            object cxDBPivotGrid2Tarih: TcxDBPivotGridField
              AreaIndex = 1
              DataBinding.FieldName = 'Tarih'
              Visible = True
            end
            object cxDBPivotGrid2BelgeNo: TcxDBPivotGridField
              Area = faColumn
              AreaIndex = 0
              DataBinding.FieldName = 'BelgeNo'
              Visible = True
            end
            object cxDBPivotGrid2Carikodu: TcxDBPivotGridField
              Area = faRow
              AreaIndex = 0
              IsCaptionAssigned = True
              Caption = 'Bayi Kodu'
              DataBinding.FieldName = 'Carikodu'
              Visible = True
            end
            object cxDBPivotGrid2FirmaAdi: TcxDBPivotGridField
              Area = faRow
              AreaIndex = 1
              IsCaptionAssigned = True
              Caption = 'Bayi Ad'#305
              DataBinding.FieldName = 'FirmaAdi'
              Visible = True
            end
            object cxDBPivotGrid2Faturano: TcxDBPivotGridField
              AreaIndex = 2
              IsCaptionAssigned = True
              Caption = 'Fatura No'
              DataBinding.FieldName = 'Faturano'
              Visible = True
            end
            object cxDBPivotGrid2FaturaBilisNo: TcxDBPivotGridField
              AreaIndex = 3
              IsCaptionAssigned = True
              Caption = 'Fatura BilisNo'
              DataBinding.FieldName = 'FaturaBilisNo'
              Visible = True
            end
            object cxDBPivotGrid2Stokkodu: TcxDBPivotGridField
              Area = faColumn
              AreaIndex = 1
              DataBinding.FieldName = 'Stokkodu'
              Visible = True
            end
            object cxDBPivotGrid2Cinsi: TcxDBPivotGridField
              AreaIndex = 4
              DataBinding.FieldName = 'Cinsi'
              Visible = True
            end
            object cxDBPivotGrid2SiparisMiktar: TcxDBPivotGridField
              Area = faData
              AreaIndex = 0
              IsCaptionAssigned = True
              Caption = 'Sipari'#351' Miktar'
              DataBinding.FieldName = 'SiparisMiktar'
              Visible = True
              Width = 73
            end
            object cxDBPivotGrid2FaturaMiktar: TcxDBPivotGridField
              Area = faData
              AreaIndex = 1
              IsCaptionAssigned = True
              Caption = 'Fatura Miktar'
              DataBinding.FieldName = 'FaturaMiktar'
              Visible = True
              Width = 68
            end
          end
        end
      end
    end
    object TS1: TTabSheet
      Caption = '  Sipari'#351' '#304'zleme  '
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 966
        Height = 59
        Align = alTop
        TabOrder = 0
        DesignSize = (
          966
          59)
        object Label1: TLabel
          Left = 15
          Top = 23
          Width = 24
          Height = 13
          Caption = 'Proje'
        end
        object lcProje: TwwDBLookupCombo
          Left = 67
          Top = 19
          Width = 153
          Height = 21
          DisableThemes = False
          DropDownAlignment = taLeftJustify
          Selected.Strings = (
            'ProjeKodu'#9'10'#9'ProjeKodu'#9#9
            'ProjeAdi'#9'30'#9'ProjeAdi'#9#9)
          LookupTable = aqProje
          LookupField = 'Ref'
          Style = csDropDownList
          Navigator = False
          TabOrder = 0
          AutoDropDown = True
          ShowButton = True
          UseTFields = False
          AllowClearKey = False
        end
        object btListele: TBitBtn
          Left = 248
          Top = 11
          Width = 102
          Height = 38
          Action = acListele
          Caption = 'Listele'
          TabOrder = 1
        end
        object btEslestir: TBitBtn
          Left = 846
          Top = 11
          Width = 102
          Height = 38
          Anchors = [akTop, akRight]
          Caption = 'E'#351'le'#351'tirme Yap'
          TabOrder = 2
          OnClick = btEslestirClick
        end
      end
      object PivotGrid1: TcxDBPivotGrid
        Left = 0
        Top = 59
        Width = 966
        Height = 455
        Align = alClient
        DataSource = dsListe
        Groups = <>
        TabOrder = 1
      end
      object GroupBox4: TGroupBox
        Left = 0
        Top = 514
        Width = 966
        Height = 28
        Align = alBottom
        TabOrder = 2
        object Label2: TLabel
          Left = 9
          Top = 9
          Width = 59
          Height = 13
          Caption = 'Kay'#305't Say'#305's'#305' :'
        end
        object LKS: TLabel
          Left = 74
          Top = 9
          Width = 6
          Height = 13
          Caption = '0'
        end
      end
    end
    object TS2: TTabSheet
      Caption = '  Sipari'#351' Excel Aktar'#305'm  '
      ImageIndex = 1
      object GroupBox2: TGroupBox
        Left = 0
        Top = 487
        Width = 966
        Height = 55
        Align = alBottom
        TabOrder = 2
        object Label7: TLabel
          Left = 9
          Top = 23
          Width = 59
          Height = 13
          Caption = 'Kay'#305't Say'#305's'#305' :'
        end
        object LKayit: TLabel
          Left = 74
          Top = 23
          Width = 6
          Height = 13
          Caption = '0'
        end
        object btSistemeAktar: TBitBtn
          Left = 894
          Top = 11
          Width = 102
          Height = 37
          Caption = 'Sisteme Aktar'
          Enabled = False
          TabOrder = 0
          OnClick = btSistemeAktarClick
        end
      end
      object cxGrid1: TcxGrid
        Left = 0
        Top = 71
        Width = 966
        Height = 416
        Align = alClient
        TabOrder = 1
        object TVExcel: TcxGridDBTableView
          NavigatorButtons.ConfirmDelete = False
          NavigatorButtons.First.Visible = True
          NavigatorButtons.PriorPage.Visible = True
          NavigatorButtons.Prior.Visible = True
          NavigatorButtons.Next.Visible = True
          NavigatorButtons.NextPage.Visible = True
          NavigatorButtons.Last.Visible = True
          NavigatorButtons.Insert.Visible = True
          NavigatorButtons.Append.Visible = False
          NavigatorButtons.Delete.Visible = True
          NavigatorButtons.Edit.Visible = True
          NavigatorButtons.Post.Visible = True
          NavigatorButtons.Cancel.Visible = True
          NavigatorButtons.Refresh.Visible = True
          NavigatorButtons.SaveBookmark.Visible = True
          NavigatorButtons.GotoBookmark.Visible = True
          NavigatorButtons.Filter.Visible = True
          DataController.DataSource = dsExcel
          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <>
          DataController.Summary.SummaryGroups = <>
          OptionsBehavior.IncSearch = True
          OptionsData.CancelOnExit = False
          OptionsData.Deleting = False
          OptionsData.DeletingConfirmation = False
          OptionsData.Editing = False
          OptionsData.Inserting = False
          OptionsSelection.UnselectFocusedRecordOnExit = False
          OptionsView.NoDataToDisplayInfoText = '  '
          OptionsView.GroupByBox = False
          OptionsView.Indicator = True
        end
        object cxGrid1Level1: TcxGridLevel
          GridView = TVExcel
        end
      end
      object GroupBox3: TGroupBox
        Left = 0
        Top = 0
        Width = 966
        Height = 71
        Align = alTop
        TabOrder = 0
        object Label4: TLabel
          Left = 16
          Top = 44
          Width = 24
          Height = 13
          Caption = 'Tarih'
        end
        object Label5: TLabel
          Left = 16
          Top = 23
          Width = 24
          Height = 13
          Caption = 'Proje'
        end
        object lcProjeAktar: TwwDBLookupCombo
          Left = 53
          Top = 19
          Width = 153
          Height = 21
          DisableThemes = False
          DropDownAlignment = taLeftJustify
          Selected.Strings = (
            'ProjeKodu'#9'10'#9'ProjeKodu'#9#9
            'ProjeAdi'#9'30'#9'ProjeAdi'#9#9)
          LookupTable = aqProje
          LookupField = 'Ref'
          Style = csDropDownList
          Navigator = False
          TabOrder = 0
          AutoDropDown = True
          ShowButton = True
          UseTFields = False
          AllowClearKey = False
          OnChange = lcProjeAktarChange
        end
        object dtTarih: TwwDBDateTimePicker
          Left = 53
          Top = 41
          Width = 153
          Height = 21
          CalendarAttributes.Font.Charset = DEFAULT_CHARSET
          CalendarAttributes.Font.Color = clWindowText
          CalendarAttributes.Font.Height = -11
          CalendarAttributes.Font.Name = 'MS Sans Serif'
          CalendarAttributes.Font.Style = []
          Epoch = 1950
          ShowButton = True
          TabOrder = 1
          OnChange = dtTarihChange
        end
        object btExceldenAktar: TBitBtn
          Left = 215
          Top = 22
          Width = 102
          Height = 37
          Caption = 'Excel den Aktar'
          TabOrder = 2
          OnClick = btExceldenAktarClick
        end
      end
    end
    object TS3: TTabSheet
      Tag = 1001
      Caption = 'Sat'#305'lan '#220'r'#252'n Aktar'#305'm'#305
      ImageIndex = 2
      object GroupBox5: TGroupBox
        Left = 0
        Top = 0
        Width = 966
        Height = 71
        Align = alTop
        TabOrder = 0
        object btExcelSatisAktar: TBitBtn
          Left = 16
          Top = 21
          Width = 102
          Height = 37
          Caption = 'Excel den Aktar'
          TabOrder = 0
          OnClick = btExcelSatisAktarClick
        end
      end
      object cxGrid2: TcxGrid
        Left = 0
        Top = 71
        Width = 966
        Height = 416
        Align = alClient
        TabOrder = 1
        object TVExcelSatis: TcxGridDBTableView
          NavigatorButtons.ConfirmDelete = False
          NavigatorButtons.First.Visible = True
          NavigatorButtons.PriorPage.Visible = True
          NavigatorButtons.Prior.Visible = True
          NavigatorButtons.Next.Visible = True
          NavigatorButtons.NextPage.Visible = True
          NavigatorButtons.Last.Visible = True
          NavigatorButtons.Insert.Visible = True
          NavigatorButtons.Append.Visible = False
          NavigatorButtons.Delete.Visible = True
          NavigatorButtons.Edit.Visible = True
          NavigatorButtons.Post.Visible = True
          NavigatorButtons.Cancel.Visible = True
          NavigatorButtons.Refresh.Visible = True
          NavigatorButtons.SaveBookmark.Visible = True
          NavigatorButtons.GotoBookmark.Visible = True
          NavigatorButtons.Filter.Visible = True
          OnCustomDrawCell = TVExcelSatisCustomDrawCell
          DataController.DataSource = dsSatis
          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <>
          DataController.Summary.SummaryGroups = <>
          OptionsBehavior.IncSearch = True
          OptionsData.CancelOnExit = False
          OptionsData.Deleting = False
          OptionsData.DeletingConfirmation = False
          OptionsData.Editing = False
          OptionsData.Inserting = False
          OptionsSelection.UnselectFocusedRecordOnExit = False
          OptionsView.NoDataToDisplayInfoText = '  '
          OptionsView.GroupByBox = False
          OptionsView.Indicator = True
          object TVExcelSatisTarih: TcxGridDBColumn
            DataBinding.FieldName = 'Tarih'
            Width = 80
          end
          object TVExcelSatisExcelSerino: TcxGridDBColumn
            Caption = 'Excel MakinaNo'
            DataBinding.FieldName = 'ExcelMakinaNo'
            Width = 151
          end
          object TVExcelSatisExcelCarikodu: TcxGridDBColumn
            Caption = 'Excel Carikodu'
            DataBinding.FieldName = 'ExcelCarikodu'
            Width = 169
          end
          object TVExcelSatisExcelStokkodu: TcxGridDBColumn
            Caption = 'Excel Stokkodu'
            DataBinding.FieldName = 'ExcelStokkodu'
            Width = 147
          end
          object TVExcelSatisMakinaNo: TcxGridDBColumn
            DataBinding.FieldName = 'MakinaNo'
            Width = 135
          end
          object TVExcelSatisCarikodu: TcxGridDBColumn
            DataBinding.FieldName = 'Carikodu'
            Width = 118
          end
          object TVExcelSatisStokkodu: TcxGridDBColumn
            DataBinding.FieldName = 'Stokkodu'
            Width = 157
          end
        end
        object cxGridLevel1: TcxGridLevel
          GridView = TVExcelSatis
        end
      end
      object GroupBox6: TGroupBox
        Left = 0
        Top = 487
        Width = 966
        Height = 55
        Align = alBottom
        TabOrder = 2
        object Label3: TLabel
          Left = 9
          Top = 23
          Width = 59
          Height = 13
          Caption = 'Kay'#305't Say'#305's'#305' :'
        end
        object LSatis: TLabel
          Left = 74
          Top = 23
          Width = 6
          Height = 13
          Caption = '0'
        end
        object btSatisSistemeAktar: TBitBtn
          Left = 853
          Top = 12
          Width = 102
          Height = 37
          Caption = 'Sisteme Aktar'
          Enabled = False
          TabOrder = 0
          OnClick = btSatisSistemeAktarClick
        end
      end
    end
    object TS4: TTabSheet
      Caption = 'Genel Sorgu'
      ImageIndex = 3
      object cxDBPivotGrid1: TcxDBPivotGrid
        Left = 0
        Top = 54
        Width = 966
        Height = 488
        Align = alClient
        DataSource = dsGenelSorgu
        Groups = <>
        TabOrder = 1
        object cxDBPivotGrid1Carikodu: TcxDBPivotGridField
          Area = faRow
          AreaIndex = 0
          DataBinding.FieldName = 'Carikodu'
          Visible = True
        end
        object cxDBPivotGrid1FirmAdi: TcxDBPivotGridField
          Area = faRow
          AreaIndex = 1
          DataBinding.FieldName = 'FirmAdi'
          Visible = True
        end
        object cxDBPivotGrid1Stokkodu: TcxDBPivotGridField
          Area = faColumn
          AreaIndex = 0
          DataBinding.FieldName = 'Stokkodu'
          Visible = True
        end
        object cxDBPivotGrid1SiparisMiktar: TcxDBPivotGridField
          AreaIndex = 0
          DataBinding.FieldName = 'SiparisMiktar'
          Visible = True
        end
        object cxDBPivotGrid1KesilenMiktar: TcxDBPivotGridField
          AreaIndex = 1
          DataBinding.FieldName = 'KesilenMiktar'
          Visible = True
        end
        object cxDBPivotGrid1iadeMiktar: TcxDBPivotGridField
          AreaIndex = 2
          DataBinding.FieldName = 'iadeMiktar'
          Visible = True
        end
      end
      object GroupBox7: TGroupBox
        Left = 0
        Top = 0
        Width = 966
        Height = 54
        Align = alTop
        TabOrder = 0
        object BitBtn1: TBitBtn
          Left = 15
          Top = 11
          Width = 102
          Height = 37
          Caption = 'Listele'
          TabOrder = 0
          OnClick = BitBtn1Click
        end
      end
    end
  end
  inherited alKeyControl: TActionList
    Left = 775
    Top = 281
    object acListele: TAction
      Caption = 'Listele'
      ShortCut = 116
      OnExecute = acListeleExecute
    end
  end
  inherited XPManifest: TXPManifest
    Left = 815
    Top = 280
  end
  object aqProje: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    AfterOpen = aqProjeAfterOpen
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'Select * From TblProje Where Aktif=1')
    Left = 72
    Top = 235
  end
  object dsProje: TDataSource
    DataSet = aqProje
    Left = 72
    Top = 280
  end
  object oDlg: TOpenDialog
    Filter = 'Excel Dosyas'#305'|*.xls'
    Left = 242
    Top = 238
  end
  object cnnnExcel: TADOConnection
    LoginPrompt = False
    Left = 194
    Top = 244
  end
  object aqExcel: TADOQuery
    Connection = cnnnExcel
    LockType = ltBatchOptimistic
    BeforeOpen = aqExcelBeforeOpen
    AfterOpen = aqExcelAfterOpen
    Parameters = <>
    SQL.Strings = (
      'select * from sheet1')
    Left = 193
    Top = 297
  end
  object dsExcel: TDataSource
    DataSet = aqExcel
    Left = 190
    Top = 347
  end
  object aqProjeList: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    AfterOpen = aqProjeAfterOpen
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'select * from TblProjeSiparis Where 1=2')
    Left = 71
    Top = 363
  end
  object aqEslestirme: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'select * from TblProjeSiparis Where SiparisNo is Null'
      'Order By Ref')
    Left = 433
    Top = 231
  end
  object aqSiparisBul: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    CommandTimeout = 300
    Parameters = <
      item
        Name = 'Carikod'
        Attributes = [paSigned]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end
      item
        Name = 'Stokkod'
        Attributes = [paSigned]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end
      item
        Name = 'Miktar'
        Attributes = [paSigned]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      'Select Top 1 S.SiparisNo,Siparisharid=Sh.id From '
      'Unity_Siparis_2006 S'
      'Join Unity_Siparishar_2006 Sh ON (S.id=Sh.Siparisid)'
      
        'Where S.Carikod=:Carikod And Sh.Stokkod=:Stokkod and Sh.Miktar=:' +
        'Miktar'
      
        'and Not Exists(Select 1 From tblprojesiparis Where Siparisharid=' +
        'Sh.id)'
      'Order By S.id,Sh.id')
    Left = 436
    Top = 296
  end
  object aqListe: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforeOpen = aqListeBeforeOpen
    AfterOpen = aqListeAfterOpen
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'Select * From TblProje Where Aktif=1')
    Left = 607
    Top = 303
  end
  object dsListe: TDataSource
    DataSet = aqListe
    Left = 607
    Top = 348
  end
  object aqExcelSatis: TADOQuery
    Connection = cnnnExcel
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from sheet1')
    Left = 371
    Top = 110
  end
  object dsExcelSatis: TDataSource
    DataSet = aqExcelSatis
    Left = 370
    Top = 160
  end
  object aqSatis: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'Select '
      'Tarih=Cast('#39'2010-01-01'#39' as Datetime),'
      'MakinaNo=Cast('#39#39' as Varchar(50)),'
      'Carikod=Cast(0 as int),'
      'Carikodu=Cast('#39#39' as Varchar(50)),'
      'Stokkodu=Cast('#39#39' as Varchar(50)),'
      'ExcelMakinaNo=Cast('#39#39' as Varchar(50)),'
      'ExcelCarikodu=Cast('#39#39' as Varchar(50)),'
      'ExcelStokkodu=Cast('#39#39' as Varchar(50))'
      'into #CariStok'
      'From Stok Where 1=2'
      'Select * from #CariStok'
      'Drop Table #CariStok')
    Left = 441
    Top = 112
  end
  object dsSatis: TDataSource
    DataSet = aqSatis
    Left = 442
    Top = 157
  end
  object aqGenelSorgu: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      
        'select Carikodu=dbo.getcarikodu(s.Carikod),FirmAdi=dbo.getFirmaA' +
        'di(s.Carikod),Stokkodu=dbo.getstokkodu(sh.stokkod),SiparisMiktar' +
        '=Sum(sh.Miktar),'
      
        'KesilenMiktar=(Select Sum(Miktar) from fathar where bilisno in (' +
        'select bilisno from fatura where tarih>'#39'2010-11-05'#39' and carikod=' +
        's.carikod and ozelkod='#39'FS'#39' and isnull(iptal,'#39#39')<>'#39#304#39') and Stokko' +
        'd=sh.Stokkod),'
      
        'iadeMiktar=(Select Sum(Miktar) from fathar where bilisno in (sel' +
        'ect bilisno from fatura where tarih>'#39'2010-11-05'#39' and carikod=s.c' +
        'arikod and ozelkod='#39'FS'#39' and isnull(iptal,'#39#39')<>'#39#304#39') and Stokkod=s' +
        'h.Stokkod)-'
      
        '(Select Count(*) from fatharhar where bilisnocik in (select bili' +
        'sno from fatura where tarih>'#39'2010-11-05'#39' and carikod=s.carikod a' +
        'nd ozelkod='#39'FS'#39' and isnull(iptal,'#39#39')<>'#39#304#39') and Stokkod=sh.Stokko' +
        'd)'
      'from unity_siparis_2006 s '
      'join unity_siparishar_2006 sh on (s.id=sh.siparisid)'
      'where s.carikod in'
      '(select Carikod from cari where carikodu like '#39'TT%'#39') '
      'and s.tarih>'#39'2010-11-05'#39
      'Group by s.Carikod,sh.stokkod'
      'order by dbo.getFirmaAdi(s.Carikod)')
    Left = 631
    Top = 172
  end
  object dsGenelSorgu: TDataSource
    DataSet = aqGenelSorgu
    Left = 633
    Top = 224
  end
  object aqSiparisListe: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandTimeout = 300
    Parameters = <
      item
        Name = 'Tarih1'
        Attributes = [paNullable]
        DataType = ftDateTime
        Precision = 16
        Size = 16
        Value = Null
      end
      item
        Name = 'Tarih2'
        Attributes = [paNullable]
        DataType = ftDateTime
        Precision = 16
        Size = 16
        Value = Null
      end
      item
        Name = 'Carikodu'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 50
        Value = Null
      end>
    SQL.Strings = (
      'select '
      
        'Sp.SiparisNo,Sp.Tarih,BelgeNo=Sp.DOCODE,C.Carikodu,c.FirmaAdi,Fa' +
        'turano=F.UnityFaturaNo,'
      'FaturaBilisNo=F.BilisNo,S.Stokkodu,S.Cinsi,'
      
        'SiparisMiktar=Sph.Miktar,FaturaMiktar=(Select Sum(Miktar) From F' +
        'athar Where bilisno=F.Bilisno and Stokkod=Sph.Stokkod)'
      'from vw_SiparisListesi Sp'
      
        'Join vw_SiparisListesihar Sph on (Sp.id=Sph.Siparisid and Sp.UNI' +
        'TYDB=Sph.UNITYDB)'
      'Join Cari C on (Sp.Carikod=C.Carikod)'
      'Join Stok S on (S.Stokkod=Sph.Stokkod)'
      
        'Left Join Fatura F on (F.BelgeNo=Sp.SiparisNo and F.UnityDb=Sp.U' +
        'nityDb and isnull(F.'#304'ptal,'#39#39')<>'#39#39')'
      'Where Sp.Tarih Between :Tarih1 and :Tarih2'
      'and C.Carikodu like :Carikodu')
    Left = 428
    Top = 373
  end
  object dsSiparisListe: TDataSource
    DataSet = aqSiparisListe
    Left = 428
    Top = 415
  end
end
